home *** CD-ROM | disk | FTP | other *** search
/ Spiceworld The Movie - Interactive CD-ROM / Spiceworld The Movie: Interactive CD-ROM.iso / pc / elements / spicetwo.dir / scripts_91.ls < prev    next >
Encoding:
Text File  |  1997-12-04  |  605 b   |  21 lines
  1. on adjustVideoVol
  2.   global VIDVOLUME
  3.   repeat while the mouseDown
  4.     set theVLoc to max(185, min(290, the mouseV))
  5.     set the locV of sprite the clickOn to theVLoc
  6.     set VIDVOLUME to (290 - theVLoc) * 256 / 105
  7.     set the volume of sprite 6 to VIDVOLUME
  8.     updateStage()
  9.   end repeat
  10. end
  11.  
  12. on playQTVideo
  13.   global MOVIES, VIDVOLUME
  14.   set nextMov to random(the number of items in MOVIES)
  15.   set movieToPlay to item nextMov of MOVIES
  16.   delete item nextMov of MOVIES
  17.   set the memberNum of sprite 6 to value(movieToPlay)
  18.   set the volume of sprite 6 to VIDVOLUME
  19.   set the movieRate of sprite 6 to 1
  20. end
  21.